home *** CD-ROM | disk | FTP | other *** search
/ Laboratorio Interattivo Deagostini / laboratorio interattivo deagostini.bin / Start1.dir / 00001_Script_1 next >
Text File  |  2003-01-08  |  2KB  |  79 lines
  1. global gFont, gDimFont, gInterlinea, gDelim, gPercorsoMovies, gPercorsoImgMedie, gPercorsoImgFull, gPercorsoSlide, \
  2. gPercorsoVideo, LSpostamenti, gPercorsoFlash, gPercorsoAudio, gPercorsoSfondi, gStart, gPercorsoGuide
  3. global gPercorsoUtili, gPercorsoTesti, gPercorsoImgs, gPercorsoEs, gPercorsoPDF
  4.  
  5. --globali disabilitate
  6. -- gPercorsoQTVR, gPercorsoMov, gAccess
  7. on prepareMovie
  8.   
  9.   if the platform starts "Mac" then
  10.     set gFont = "Helvetica"
  11.     set gDimFont = 12
  12.     set gInterlinea = 14
  13.     set gDelim = ":"
  14.   else
  15.     if the platform starts "Win" then
  16.       set gFont = "Arial"
  17.       set gDimFont = 14
  18.       set gInterlinea = 14
  19.       set gDelim = "\"
  20.     end if
  21.   end if
  22.   
  23.   -- pathCD: contiene il path della root del CD-ROM
  24.   -- pathSRC: contiene il path della cartella di installazione nel disco rigido 
  25.   -- io installerei i seguenti file e directory:
  26.   --  Files
  27.   --  Sfondi
  28.   --  swf
  29.   --  Testi
  30.   --  Utility
  31.   --  Xtras
  32.   --  leggimi.txt
  33.   --  Lingo.ini
  34.   --  start.exe
  35.   --  Start.ico
  36.   --  Start.ini
  37.   --  Start1.dir
  38.   
  39.   -- tutti gli altri li prenderei direttamente dal CD-ROM
  40.   
  41.   
  42.   
  43.   nomeFileIni = "gramma.ini"
  44.   
  45.   if the runmode = "author" then
  46.     pathHD = the moviePath
  47.     pathCD= the moviePath 
  48.   else
  49.     pathHD = freeReadIni ("INFO", "pathCD", the moviePath, nomeFileIni) & "\"
  50.     pathCD= freeReadIni ("INFO", "pathSRC", the moviePath , nomeFileIni) 
  51.   end if
  52.   
  53.   
  54.   put "pathHD" && pathHD
  55.   put "pathCD" && pathCD
  56.   
  57.   
  58.   set gPercorsoMovies = pathHD & "Files" & gDelim
  59.   set gPercorsoSfondi = pathHD & "Sfondi" & gDelim
  60.   set gPercorsoImgs   = pathCD & "Imgs" & gDelim
  61.   --  set gPercorsoImgMedie = pathCD & "i" & gDelim & "Medie" & gDelim
  62.   --  set gPercorsoImgFull = pathCD & "i" & gDelim & "Full" & gDelim
  63.   --  set gPercorsoGuide = pathCD & "i" & gDelim & "Guide" & gDelim
  64.   --  set gPercorsoSlide = pathCD & "Slide" & gDelim
  65.   set gPercorsoVideo = pathCD & "V" & gDelim
  66.   --  set gPercorsoFlash = pathCD & "Flash" & gDelim
  67.   set gPercorsoTesti = pathHD & "Testi" & gDelim
  68.   --  set gPercorsoQTVR = pathCD & "QTVR" & gDelim
  69.   --  set gPercorsomov = pathCD & "Mov" & gDelim
  70.   set gPercorsoAudio = pathHD & "A" & gDelim
  71.   set gPercorsoUtili = pathHD & "Utility" & gDelim
  72.   set gPercorsoEs    = pathHD & "swf" & gDelim
  73.   set gPercorsoPDF   = pathCD & "pdf" & gDelim
  74.   
  75.   set LSpostamenti = []
  76.   set gStart = 0
  77.   --0 per CD, 1 per lavorazione
  78.   --  set gAccess = 0
  79. end prepareMovie